"0","```r
# examine the final downloaded file
str(scpdFauna) # another possible way to examine the data: glimpse(scpdFauna)
```"
"1","'data.frame':	14 obs. of  22 variables:
 $ Carnivora                       : num  1 0 0 0 0 0 0 0 0 0 ...
 $ cf. Scapanus latimanus          : num  1 1 2 3 2 1 1 0 3 2 ...
 $ Chiroptera                      : num  3 8 5 13 9 5 14 3 11 7 ...
 $ Leporidae                       : num  3 2 0 0 1 0 2 2 1 0 ...
 $ Microtus sp.                    : num  38 30 15 51 40 31 32 13 15 19 ...
 $ Neotoma sp.                     : num  32 44 28 35 28 20 39 14 28 24 ...
 $ Peromyscus sp.                  : num  151 171 136 220 203 112 184 77 132 114 ...
 $ Sorex sp.                       : num  4 2 2 3 6 0 2 0 4 0 ...
 $ Spermophilus beecheyi           : num  1 1 2 4 4 1 5 3 4 2 ...
 $ Tamias sp.                      : num  1 0 0 1 1 0 0 1 1 3 ...
 $ Tamiasciurus douglasii          : num  1 1 1 2 1 2 1 0 3 2 ...
 $ Thomomys bottae                 : num  5 9 2 6 6 1 1 3 1 1 ...
 $ Thomomys sp.                    : num  14 18 23 42 25 19 24 18 21 30 ...
 $ cf. Arborimus albipes           : num  0 1 0 0 0 0 1 1 1 1 ...
 $ Reithrodontomys cf. R. megalotis: num  0 1 1 1 0 0 0 0 1 0 ...
 $ Sciurus griseus                 : num  0 1 1 3 1 1 2 0 3 0 ...
 $ Spermophilus lateralis          : num  0 2 0 1 0 1 1 0 2 1 ...
 $ Glaucomys cf. G. sabrinus       : num  0 0 0 2 1 0 1 0 0 0 ...
 $ Thomomys cf. T. mazama          : num  0 0 0 0 2 0 3 0 1 5 ...
 $ Artiodactyla                    : num  0 0 0 0 0 0 2 0 0 0 ...
 $ Myodes cf. M. californicus      : num  0 0 0 0 0 0 2 0 0 0 ...
 $ Aplodontia rufa                 : num  0 0 0 0 0 0 0 0 0 0 ...
"
"0","```r
head(scpdFauna) 
```"
